Top 10k strings from Portals of P'Thaal (1987)(Sinclair User).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Covertapes / Sinclair ZX Spectrum - Covertapes - [TAP] (TOSEC-v2007-01-01) /

Back to the directory listing

   4 "PORTCODE"
   3 ,C;"You gain";
   2 ;"           ":
   2 ,C;"number ";BOP
   2 ,C;"EXPerience":
   2 ,C;"Choose a spell";
   1 Z1,PIC-256
   1 Z(N)=L(N):
   1 Z$(N,T)=L$(N,T):
   1 Y(Z)=Y(Z)-FIRE:
   1 Y(BOP)=Y(BOP)-BRAWL:
   1 Y(BOP)=Y(BOP)-BRAWL
   1 W(B)=W(B)-D:
   1 PORTCODE  `
   1 PORTALS   Z<
   1 N,H;"NN  N":
   1 N,A;"MMMMMMMMMMMMMMMMMM":
   1 N,A;"                   ":
   1 N+D,H;S$(N,B);
   1 M;"S)ave"''
   1 M;"R)amsave"''
   1 M,M;"PLEASE WAIT"
   1 M$(MON,H):
   1 M$(MON,B))
   1 L(V-G)=100
   1 L(U)=L(U)-B:
   1 L(N)=Z(N):
   1 L(N)=L(N)-B:
   1 L(J)=L(J)+EXPN:
   1 L(J)=L(J)+30
   1 L(H)=L(H)-B:
   1 L(H)=L(H)+B:
   1 L(G)=L(G)+B:
   1 L(F)=L(F)-(
   1 L(F)=L(F)+C:
   1 L(F)=L(F)+BRAWL:
   1 L(E)=L(E)+D:
   1 L(D)=L(D)-T:
   1 L(D)=L(D)+G
   1 L(D)=L(D)+F:
   1 L$(X-B,Y,D)="0"
   1 L$(X,Y,H)="1"
   1 L$(X,Y,H)="0":
   1 L$(X,Y,F)="1"
   1 L$(X,Y,E)="1"
   1 L$(X,Y,E)="0"
   1 L$(X,Y,D)="1"
   1 L$(X,Y,D)="0"
   1 L$(X,Y,C)="1"
   1 L$(X,Y,C)="0"
   1 L$(X,Y,B)="1"
   1 L$(X,Y,B)="0"
   1 L$(X+B,Y,E)="0"
   1 L$(V,I,H)="1":
   1 L$(V,B,G)=
   1 L$(N,T)=Z$(N,T):
   1 L$(N,I,E)="0":
   1 L$(N,I,D)="0":
   1 L$(N,I,C)="0":
   1 L$(N,I,B)="0":
   1 L$(N,I)="1111000"
   1 L$(N,C,F)="1"
   1 K;"R)amload"''
   1 J,D;"   ";
   1 J$="Wrong denizen!"
   1 HIT=(L(E)+
   1 G;M$(MON,J
   1 EXPN=EXPN+W(N)+X(N)+Y(N):
   1 E,M;"Saving Now":
   1 E,M;"Q)uit"''
   1 E,K;"Ramsaving Now":
   1 E,K;"L)oad Saved Game"''
   1 E,J;"Loading Ramsave":
   1 E,H;"No Game Ramsaved":
   1 E,G;"Loading Saved Game":
   1 E,D;"   ";
   1 D$="8Portal":
   1 D$,D$,D$,D$
   1 C,A;N$(L(57
   1 C+N*C,D;L(N+C):
   1 C+N*C,A;A$:
   1 C$="4Camp":
   1 C$,C$,C$,C$
   1 BRAWL=HIT-(X(BOP)+
   1 B$="2Fountain":
   1 B$,B$,B$,B$,B$,B$
   1 A,A; "PORTALS OF P'THAAL"
   1 A$="NNNNNNNNNNNN"
   1 A$="M1 M2 M3":
   1 A$="IIIIIIIIIII"
   1 A$="HHHHHHHHHHH":
   1 A$="HHHHHHHHHHH"
   1 A$="GGGGGGGGGGG"
   1 A$="FFFFFFFFFFF"
   1 ;"VIC EXP:";
   1 ;"QUIT/SAVE";
   1 ;"Netherworld":
   1 ;"N*S*E*W*U*D";
   1 ;"BEFRIEND*":
   1 ;"**TURNS:"
   1 ;"            ":
   1 ,F;"(H to M)"
   1 ,E;"wins round!":
   1 ,E;"game":
   1 ,E;"Villager ";P;
   1 ,E;"Spell cast!":
   1 ,E;"SEE MENU--->"
   1 ,E;"No Pathway!":
   1 ,D;"denizen":
   1 ,D;"and kill it!":
   1 ,D;"You hit the";
   1 ,D;"No one hurt":
   1 ,D;"Blocked Path!":
   1 ,C;"villager!":
   1 ,C;"village!":
   1 ,C;"two villagers!":
   1 ,C;"the foe and gain";
   1 ,C;"spell":
   1 ,C;"is dead!":
   1 ,C;"fight denizen(s)";:
   1 ,C;"by the denizen!":
   1 ,C;"by denizen":
   1 ,C;"attacks denizen":
   1 ,C;"at the fountain":
   1 ,C;"at home!":
   1 ,C;"a stiff!":
   1 ,C;"You lose a life!":
   1 ,C;"You learn the";
   1 ,C;"You gain MAGic";
   1 ,C;"You dispose of";
   1 ,C;"You befriend a";
   1 ,C;"You are hit";
   1 ,C;"You are attacked";
   1 ,C;"Villager ";P;" dies":
   1 ,C;"Villager ";P;
   1 ,C;"Too bad you're";
   1 ,C;"This isn't a";
   1 ,C;"There's no one";
   1 ,C;"That denizen";
   1 ,C;"SPACE for another";
   1 ,C;"Press SPACE to";
   1 ,C;"PERsonality":
   1 ,C;"No one injured":
   1 ,C;"Magic or Combat?"
   1 ,C;"Eyestone found!":
   1 ,C;"ENDurance":
   1 ,C;"(A to G)"
   1 ,B;"spell at you":
   1 ,B;"friendly enough!":
   1 ,B;"casts a ";K$(
   1 ,B;"by the Bishop";
   1 ,B;"You've already got";
   1 ,B;"You're invisible!":
   1 ,B;"You attack denizen"
   1 ,B;"You are blessed";
   1 ,B;"The ";M$(MON,J
   1 ,B;"Spell not learnt!":
   1 ,B;"Sorry,you weren't";
   1 ,B;"On which denizen?"
   1 ,B;"Not enough magic!":
   1 ,B;"(+3 STRength)":
   1 ,A;"You have won the"'"game!-SPACE to play"'"again":
   1 *WIN ROUND*
   1 *VILLAGER COMBAT*
   1 *VARIOUS CHECKS*
   1 *TELEPORT*
   1 *SUBROUTINES*
   1 *REZZIRECK*
   1 *QUIT/SAVE/RAMSAVE*
   1 *PATHTWIST*
   1 *MOREMAGIC*
   1 *MON+64120
   1 *MON END UPDATE*
   1 *MEGAJUMP*
   1 *MAIN LOOP*
   1 *M.PAGE 1987/8-PORTALS OF P'THAAL*
   1 *LOSE ROUND*
   1 *LOAD/RAMLOAD*
   1 *INPUT ROUTINE*
   1 *INITIALISATION*
   1 *HOSTILE MEANIES*
   1 *FISTICUFFS*
   1 *FIREBALL*
   1 *DRAW MAP*
   1 *DISAPPEAR*
   1 *DEMBONES*
   1 *CREATE SCREEN*
   1 *CHOOSE CHAR SET*
   1 *CHECKDEAD*
   1 *CHECK WIN*
   1 *CHECK VILLAGER*
   1 *CHECK MAX EXP*
   1 *BLACKOUT*
   1 *BEFRIEND*
   1 *ANTIVAMP*
   1 '' N$(L(57
   1 "Which character do you want to  play?"'''"1:";N$(B)'"2:";N$(C)'"3:";N$(D)'''"Press key 1,2 or 3"
   1 "PORTALS":
   1 "MAG","STR","END","PER","RES","EXP","ESA"
   1 "MA:","ST:","EN:"
   1 "LOADING CODE":
   1 "Kelleck","Tamaria","Galodus"
   1 "Fireball","Blaster","Lightning"
   1 "Enter experience points requiredfor victory (100 to 999)."
   1 "CLEAR WINDOW*
   1 "ABC","DEF","GHI","JKL","MNO","PQQ","RSQ","TUV"
   1 "8No-Foe","7Gorlab","2Dembones","5Antivamp","6Blackout","3Fireball","4Teleport","4Charmer","6Megajump","4Pathtwist","4Disappear","3Moremagic","5Rezzireck"
   1 "7Aardvark Inn","7Jolly Tinker","7Balrog Arms"
   1 "5The Abbey","6Deathmeet","6Threewaters","6Rockstream","6Merrydown","6Ludbury"
   1 "3Moon Tower","3Silver Tower","3Earth Tower"
   1 "3060510Kobold","3070630Goblin","3060410Mu-Badger"
   1 "3050230Skeleton","1111330Bludbeest","1101530Slimemold"
   1 "2111010Ogre","3020330Giant Rat","3050530Orc"
   1 "1Thieves'","1Barbarians'","1Magicians'","1Clerics'","1Druids'","1Rangers'","1Assassins'","1Monks'","1Minstrels'","1Alchemists'","1Sorcerors'","1Wizards'","1Paladins'"
   1 "1104020Vampire","1121223Balrog","1080839Wizard"
   1 "1070716Sorceror","3060530Gargoyle","1111520Wight"